asp 分页代码 可以显示<<12345678>>形式的分页

是你想要的。
<%
'这里写查询语句
page=request("page")
if page="" then
page=1
else
page=Cint(page)
end if

Section=request("section")
if Section="" then
Section=1
else
Section=Cint(Section)
end if
'变量赋值
intPageSize=5 '每页显示记录数
intSectionSize=5 '多少页为一段，5表示，12345为一段。
PrevSectionText="<FONT face=webdings>7</FONT>" '上一段的链接文字
NextSectionText="<FONT face=webdings>8</FONT>" '下一段的链接文字
PrevPageText="<FONT face=webdings>3</FONT>" '上页的链接文字
NextPageText="<FONT face=webdings>4</FONT>" '下页的链接文字

strPageUrl="?t=t"

rs.pagesize=intPageSize
intCount=rs.RecordCount
intPageCount=rs.pagecount
intSectionCount=(intPageCount - 1) \ intSectionSize + 1